home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 1 / Cream of the Crop 1.iso / WINDOWS / MSWLOG12.ARJ / DEMO.BAK < prev    next >
Text File  |  1992-07-22  |  510b  |  39 lines
  1. to demo
  2. ht
  3. cs 
  4. penw 2
  5. sc 0 0 0
  6. repeat 72 [poly 100 4;penc repcount*4 0 0; rt 5]
  7. cs
  8. sc 100 100 100
  9. repeat 72 [poly repcount*2 3;penc 0 0 repcount*4; rt 5]
  10. cs
  11. sc 255 255 255
  12. penw 1
  13. rose 150 20 [fd 30]
  14. cs
  15. rose 150 20 [fd 5]
  16. cs
  17. rose 150 90 [pu; setx xcor + 5; pd]
  18. cs
  19. rose 150 30 [pu; setx xcor + 5; pd]
  20. cs
  21. rose 150 30 [pu; setx xcor + 10; pd]
  22. cs
  23. penw 5
  24. hanoi 4
  25. pd
  26. cs
  27. spiral 91 2 10
  28. cs
  29. spiral 90 2 10
  30. cs
  31. spiral 60 3 10
  32. cs
  33. spiral 61 3 10
  34. cs
  35. spiral 179 2 5
  36. cs
  37. spiral 20 10 4
  38. end
  39.